/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_2 / issue_04 / basiccomp / slashintg_

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 00 10 f4 3e 53 6c | 61 73 68 49 6e 74 67 2d |.....>Sl|ashIntg-|
|00000010| 0d 01 9a 08 eb 30 3a ee | 0d 01 a4 1c ee 20 85 20 |.....0:.|..... . |
|00000020| e7 20 9f 3d 31 37 20 8c | 20 8d 44 5c 48 20 8b 20 |. .=17 .| .D\H . |
|00000030| 8d 44 66 48 0d 01 ae 16 | ef 31 39 2c 31 2c 36 7c |.DfH....|.19,1,6||
|00000040| 3a ef 31 39 2c 30 2c 34 | 7c 3a 0d 01 b8 16 41 25 |:.19,0,4||:....A%|
|00000050| 3d 37 35 3a 42 25 3d 41 | 25 2b 31 3a 43 25 3d a3 |=75:B%=A|%+1:C%=.|
|00000060| 0d 01 c2 11 40 25 3d 26 | 30 31 30 30 30 39 30 38 |....@%=&|01000908|
|00000070| 3a 0d 01 cc 0d de 20 44 | 25 20 26 46 46 3a 0d 01 |:..... D|% &FF:..|
|00000080| f4 28 fb 20 30 3a fb 20 | 31 33 35 3a f1 c4 32 34 |.(. 0:. |135:..24|
|00000090| 30 2c 22 20 22 29 3b 8a | 30 2c 33 30 29 c4 38 30 |0," ");.|0,30).80|
|000000a0| 2c 22 20 22 29 3b 0d 01 | fe 50 f1 8a 36 2c 31 29 |," ");..|.P..6,1)|
|000000b0| 22 53 4c 41 53 48 20 2d | 20 61 20 75 74 69 6c 69 |"SLASH -| a utili|
|000000c0| 74 79 20 74 6f 20 63 6f | 6d 70 72 65 73 73 20 42 |ty to co|mpress B|
|000000d0| 41 53 49 43 20 70 72 6f | 67 72 61 6d 73 2e 20 a9 |ASIC pro|grams. .|
|000000e0| 20 42 72 69 61 6e 20 43 | 61 72 72 6f 6c 6c 2c 20 | Brian C|arroll, |
|000000f0| 31 39 38 38 2e 22 0d 02 | 08 0d fb 20 37 3a fb 20 |1988."..|... 7:. |
|00000100| 31 32 38 0d 02 30 3a f1 | 8a 33 2c 35 29 89 28 37 |128..0:.|.3,5).(7|
|00000110| 30 29 8a 33 2c 35 29 22 | 45 6e 74 65 72 20 69 6e |0).3,5)"|Enter in|
|00000120| 70 75 74 20 66 69 6c 65 | 6e 61 6d 65 3a 20 20 22 |put file|name:  "|
|00000130| 3b 3a e8 22 22 6f 6c 64 | 66 69 6c 65 24 0d 02 3a |;:.""old|file$..:|
|00000140| 28 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 35 2c |(.. "OS_|File",5,|
|00000150| 6f 6c 64 66 69 6c 65 24 | 20 b8 20 45 25 2c 2c 46 |oldfile$| . E%,,F|
|00000160| 25 2c 2c 47 25 0d 02 44 | 2d e7 20 45 25 3d 30 20 |%,,G%..D|-. E%=0 |
|00000170| ef 37 3a f1 8a 33 2c 37 | 29 22 4e 6f 20 66 69 6c |.7:..3,7|)"No fil|
|00000180| 65 20 22 6f 6c 64 66 69 | 6c 65 24 3a e5 20 8d 54 |e "oldfi|le$:. .T|
|00000190| 70 42 0d 02 4e 34 e7 20 | 45 25 3d 32 20 ef 37 3a |pB..N4. |E%=2 .7:|
|000001a0| f1 8a 33 2c 37 29 6f 6c | 64 66 69 6c 65 24 22 20 |..3,7)ol|dfile$" |
|000001b0| 69 73 20 61 20 64 69 72 | 65 63 74 6f 72 79 22 3a |is a dir|ectory":|
|000001c0| e5 20 8d 54 70 42 0d 02 | 58 49 e7 20 c1 c3 7e 46 |. .TpB..|XI. ..~F|
|000001d0| 25 2c 34 2c 33 29 3c 3e | 22 46 46 42 22 20 ef 37 |%,4,3)<>|"FFB" .7|
|000001e0| 3a f1 8a 33 2c 37 29 6f | 6c 64 66 69 6c 65 24 22 |:..3,7)o|ldfile$"|
|000001f0| 20 69 73 20 6e 6f 74 20 | 61 20 42 41 53 49 43 20 | is not |a BASIC |
|00000200| 70 72 6f 67 72 61 6d 22 | 3a e5 20 8d 54 70 42 0d |program"|:. .TpB.|
|00000210| 02 80 3a f1 8a 33 2c 37 | 29 89 28 37 30 29 8a 33 |..:..3,7|).(70).3|
|00000220| 2c 37 29 22 45 6e 74 65 | 72 20 6f 75 74 70 75 74 |,7)"Ente|r output|
|00000230| 20 66 69 6c 65 6e 61 6d | 65 3a 20 22 3b 3a e8 22 | filenam|e: ";:."|
|00000240| 22 6e 65 77 66 69 6c 65 | 24 0d 02 8a 4f e7 20 6e |"newfile|$...O. n|
|00000250| 65 77 66 69 6c 65 24 3d | 6f 6c 64 66 69 6c 65 24 |ewfile$=|oldfile$|
|00000260| 20 ef 37 3a f1 8a 33 2c | 39 29 22 59 6f 75 20 77 | .7:..3,|9)"You w|
|00000270| 69 6c 6c 20 6f 76 65 72 | 2d 77 72 69 74 65 20 74 |ill over|-write t|
|00000280| 68 65 20 69 6e 70 75 74 | 20 66 69 6c 65 21 22 27 |he input| file!"'|
|00000290| 27 3a e5 20 8d 74 40 42 | 0d 02 94 3d ee 20 85 20 |':. .t@B|...=. . |
|000002a0| 3a 87 3a f1 8a 33 2c 39 | 29 22 50 75 74 20 61 20 |:.:..3,9|)"Put a |
|000002b0| 64 69 73 63 20 69 6e 20 | 74 68 65 20 64 65 73 74 |disc in |the dest|
|000002c0| 69 6e 61 74 69 6f 6e 20 | 64 72 69 76 65 22 3a e5 |ination |drive":.|
|000002d0| 20 8d 74 5e 42 0d 02 9e | 27 c8 99 20 22 4f 53 5f | .t^B...|'.. "OS_|
|000002e0| 46 69 6c 65 22 2c 35 2c | 6e 65 77 66 69 6c 65 24 |File",5,|newfile$|
|000002f0| 20 b8 20 45 25 2c 2c 2c | 2c 2c 48 25 0d 02 a8 1d | . E%,,,|,,H%....|
|00000300| ee 20 85 20 e7 20 9f 3d | 31 37 20 8c 20 8d 44 5c |. . . .=|17 . .D\|
|00000310| 48 20 8b 20 8d 44 66 48 | 3a 0d 02 b2 0f f1 8a 33 |H . .DfH|:......3|
|00000320| 2c 39 29 89 28 37 30 29 | 0d 02 bc 34 e7 20 45 25 |,9).(70)|...4. E%|
|00000330| 3d 32 20 ef 37 3a f1 8a | 33 2c 39 29 6e 65 77 66 |=2 .7:..|3,9)newf|
|00000340| 69 6c 65 24 22 20 69 73 | 20 61 20 64 69 72 65 63 |ile$" is| a direc|
|00000350| 74 6f 72 79 22 3a e5 20 | 8d 74 40 42 0d 02 c6 0a |tory":. |.t@B....|
|00000360| e7 20 45 25 20 8c 0d 02 | d0 39 e7 20 48 25 20 80 |. E% ...|.9. H% .|
|00000370| 20 25 30 30 30 30 31 30 | 30 30 20 ef 37 3a f1 8a | %000010|00 .7:..|
|00000380| 33 2c 39 29 6e 65 77 66 | 69 6c 65 24 22 20 69 73 |3,9)newf|ile$" is|
|00000390| 20 6c 6f 63 6b 65 64 22 | 3a e5 20 8d 74 40 42 0d | locked"|:. .t@B.|
|000003a0| 02 da 46 ef 37 3a f1 8a | 33 2c 39 29 6e 65 77 66 |..F.7:..|3,9)newf|
|000003b0| 69 6c 65 24 22 20 65 78 | 69 73 74 73 2e 20 44 6f |ile$" ex|ists. Do|
|000003c0| 20 79 6f 75 20 77 61 6e | 74 20 74 6f 20 6f 76 65 | you wan|t to ove|
|000003d0| 72 2d 77 72 69 74 65 20 | 69 74 20 28 59 2f 4e 29 |r-write |it (Y/N)|
|000003e0| 20 3f 20 22 3b 0d 02 e4 | 1d e7 20 a4 6e 6f 20 f1 | ? ";...|.. .no .|
|000003f0| 8a 33 2c 39 29 89 28 37 | 30 29 3a e5 20 8d 74 40 |.3,9).(7|0):. .t@|
|00000400| 42 3a 0d 02 ee 05 cd 0d | 02 f8 05 87 0d 03 20 11 |B:......|...... .|
|00000410| de 20 4a 25 20 41 25 2b | 47 25 2b 35 3a 0d 03 2a |. J% A%+|G%+5:..*|
|00000420| 28 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 26 46 |(.. "OS_|File",&F|
|00000430| 46 2c 6f 6c 64 66 69 6c | 65 24 2c 28 4a 25 2b 41 |F,oldfil|e$,(J%+A|
|00000440| 25 29 2c 30 3a 0d 03 52 | 3b f1 8a 31 32 2c 31 31 |%),0:..R|;..12,11|
|00000450| 29 22 31 2e 20 52 65 6d | 6f 76 65 20 52 45 4d 73 |)"1. Rem|ove REMs|
|00000460| 20 28 59 2f 4e 29 3f 2e | 2e 2e 2e 2e 2e 2e 2e 2e | (Y/N)?.|........|
|00000470| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 20 22 3b |........|..... ";|
|00000480| 0d 03 5c 15 e7 20 a4 6e | 6f 20 4b 25 3d a3 20 8b |..\.. .n|o K%=. .|
|00000490| 20 4b 25 3d b9 0d 03 66 | 3b f1 8a 31 32 2c 31 32 | K%=...f|;..12,12|
|000004a0| 29 22 32 2e 20 52 65 6d | 6f 76 65 20 6c 65 61 64 |)"2. Rem|ove lead|
|000004b0| 69 6e 67 20 73 70 61 63 | 65 73 20 26 20 63 6f 6c |ing spac|es & col|
|000004c0| 6f 6e 73 20 28 59 2f 4e | 29 3f 20 2e 2e 20 22 3b |ons (Y/N|)? .. ";|
|000004d0| 0d 03 70 15 e7 20 a4 6e | 6f 20 4c 25 3d a3 20 8b |..p.. .n|o L%=. .|
|000004e0| 20 4c 25 3d b9 0d 03 7a | 3b f1 8a 31 32 2c 31 33 | L%=...z|;..12,13|
|000004f0| 29 22 33 2e 20 52 65 6d | 6f 76 65 20 65 6d 70 74 |)"3. Rem|ove empt|
|00000500| 79 20 6c 69 6e 65 73 20 | 28 59 2f 4e 29 3f 20 2e |y lines |(Y/N)? .|
|00000510| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 20 22 3b |........|..... ";|
|00000520| 0d 03 84 15 e7 20 a4 6e | 6f 20 4d 25 3d a3 20 8b |..... .n|o M%=. .|
|00000530| 20 4d 25 3d b9 0d 03 8e | 1e e7 20 4b 25 20 84 20 | M%=....|.. K% . |
|00000540| 4c 25 20 84 20 4d 25 20 | 4e 25 3d a3 20 8b 20 4e |L% . M% |N%=. . N|
|00000550| 25 3d b9 0d 03 b6 3b f1 | 8a 31 32 2c 31 34 29 22 |%=....;.|.12,14)"|
|00000560| 34 2e 20 50 72 6f 63 65 | 73 73 20 61 6c 6c 20 6c |4. Proce|ss all l|
|00000570| 69 6e 65 73 20 28 59 2f | 4e 29 3f 20 2e 2e 2e 2e |ines (Y/|N)? ....|
|00000580| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 20 22 3b 0d 03 |........|... ";..|
|00000590| c0 0b e7 20 a4 6e 6f 20 | 8c 0d 03 ca 12 f1 8a 31 |... .no |.......1|
|000005a0| 32 2c 31 34 29 89 28 36 | 37 29 3b 0d 03 d4 2f f1 |2,14).(6|7);.../.|
|000005b0| 8a 31 32 2c 31 34 29 22 | 34 2e 20 53 74 6f 70 20 |.12,14)"|4. Stop |
|000005c0| 70 72 6f 63 65 73 73 69 | 6e 67 20 40 20 6c 69 6e |processi|ng @ lin|
|000005d0| 65 20 22 3b 3a e8 22 22 | 4f 25 0d 03 de 14 e7 20 |e ";:.""|O%..... |
|000005e0| 4f 25 3c 30 20 ef 37 3a | e5 20 8d 64 4a 43 0d 03 |O%<0 .7:|. .dJC..|
|000005f0| e8 25 f1 8a 34 33 2c 31 | 34 29 22 2c 20 72 65 73 |.%..43,1|4)", res|
|00000600| 75 6d 65 20 40 20 6c 69 | 6e 65 20 22 3b 3a e8 22 |ume @ li|ne ";:."|
|00000610| 22 50 25 0d 03 f2 21 e7 | 20 50 25 3e 36 35 32 37 |"P%...!.| P%>6527|
|00000620| 39 20 84 20 4f 25 3e 3d | 50 25 20 ef 37 3a e5 20 |9 . O%>=|P% .7:. |
|00000630| 8d 64 4a 43 0d 03 fc 05 | cc 0d 04 06 0e 4f 25 3d |.dJC....|.....O%=|
|00000640| 30 3a 50 25 3d 30 3a 0d | 04 10 05 cd 0d 04 38 0c |0:P%=0:.|......8.|
|00000650| 4a 25 3f 30 3d 26 44 3a | 0d 04 42 0a e7 20 4e 25 |J%?0=&D:|..B.. N%|
|00000660| 20 8c 0d 04 4c 09 51 25 | 3d 31 3a 0d 04 56 05 cc | ...L.Q%|=1:..V..|
|00000670| 0d 04 60 0b 4a 25 21 31 | 3d 30 3a 0d 04 6a 1d 52 |..`.J%!1|=0:..j.R|
|00000680| 25 3d a9 28 6e 65 77 66 | 69 6c 65 24 29 3a 4a 25 |%=.(newf|ile$):J%|
|00000690| 3f 33 3d 52 25 2b 36 3a | 0d 04 74 16 4a 25 3f 34 |?3=R%+6:|..t.J%?4|
|000006a0| 3d 26 46 34 3a 4a 25 3f | 35 3d 26 33 45 3a 0d 04 |=&F4:J%?|5=&3E:..|
|000006b0| 7e 10 e3 20 53 25 3d 31 | 20 b8 20 52 25 3a 0d 04 |~.. S%=1| . R%:..|
|000006c0| 88 20 4a 25 3f 28 53 25 | 2b 35 29 3d 97 28 c1 6e |. J%?(S%|+5)=.(.n|
|000006d0| 65 77 66 69 6c 65 24 2c | 53 25 2c 31 29 29 0d 04 |ewfile$,|S%,1))..|
|000006e0| 92 05 ed 0d 04 9c 11 4a | 25 3f 28 52 25 2b 36 29 |.......J|%?(R%+6)|
|000006f0| 3d 26 44 3a 0d 04 a6 0c | 51 25 3d 52 25 2b 37 3a |=&D:....|Q%=R%+7:|
|00000700| 0d 04 b0 05 cd 0d 04 d8 | 13 d1 3d 30 3a 87 3a ef |........|..=0:.:.|
|00000710| 31 39 2c 31 2c 33 7c 3a | 0d 04 e2 5b e7 20 4e 25 |19,1,3|:|...[. N%|
|00000720| 20 f1 8a 33 2c 31 36 29 | 22 4e 6f 74 20 6d 75 63 | ..3,16)|"Not muc|
|00000730| 68 20 70 6f 69 6e 74 2c | 20 69 73 20 74 68 65 72 |h point,| is ther|
|00000740| 65 3f 20 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 20 |e? .....|....... |
|00000750| 4f 68 20 77 65 6c 6c 2c | 20 69 66 20 79 6f 75 20 |Oh well,| if you |
|00000760| 69 6e 73 69 73 74 21 22 | 3a f5 20 fd 20 91 3e 33 |insist!"|:. . .>3|
|00000770| 30 30 3a 0d 04 ec 2c d1 | 3d 30 3a f1 8a 33 2c 31 |00:...,.|=0:..3,1|
|00000780| 36 29 89 28 37 36 29 8a | 33 2c 31 36 29 22 50 72 |6).(76).|3,16)"Pr|
|00000790| 6f 63 65 73 73 69 6e 67 | 20 6c 69 6e 65 22 3b 0d |ocessing| line";.|
|000007a0| 05 00 12 c8 95 20 42 25 | 2d 41 25 3c 47 25 2d 31 |..... B%|-A%<G%-1|
|000007b0| 3a 0d 05 14 11 44 25 3f | 30 3d 4a 25 3f 28 42 25 |:....D%?|0=J%?(B%|
|000007c0| 29 3a 0d 05 1e 13 44 25 | 3f 31 3d 4a 25 3f 28 42 |):....D%|?1=J%?(B|
|000007d0| 25 2b 31 29 3a 0d 05 28 | 17 54 25 3d 32 35 36 2a |%+1):..(|.T%=256*|
|000007e0| 28 44 25 3f 30 29 2b 44 | 25 3f 31 3a 0d 05 32 13 |(D%?0)+D|%?1:..2.|
|000007f0| f1 8a 31 39 2c 31 36 29 | c3 28 54 25 29 3b 3a 0d |..19,16)|.(T%);:.|
|00000800| 05 3c 11 55 25 3d 4a 25 | 3f 28 42 25 2b 32 29 3a |.<.U%=J%|?(B%+2):|
|00000810| 0d 05 50 21 e7 20 54 25 | 3e 3d 4f 25 20 80 20 54 |..P!. T%|>=O% . T|
|00000820| 25 3c 3d 50 25 20 56 25 | 3d a3 20 8b 20 56 25 3d |%<=P% V%|=. . V%=|
|00000830| b9 0d 05 5a 15 e7 20 4c | 25 20 57 25 3d b9 20 8b |...Z.. L|% W%=. .|
|00000840| 20 57 25 3d a3 3a 0d 05 | 6e 0e 58 25 3d 33 3a 59 | W%=.:..|n.X%=3:Y|
|00000850| 25 3d 33 3a 0d 05 82 05 | f5 0d 05 8c 12 52 25 3d |%=3:....|.....R%=|
|00000860| 4a 25 3f 28 42 25 2b 58 | 25 29 3a 0d 05 a0 33 e7 |J%?(B%+X|%):...3.|
|00000870| 20 56 25 20 f1 8a 34 30 | 2c 31 36 29 22 20 20 20 | V% ..40|,16)"   |
|00000880| 20 20 20 22 20 8b 20 f1 | 8a 34 30 2c 31 36 29 22 |   " . .|.40,16)"|
|00000890| 5b 53 6b 69 70 5d 22 3a | e5 20 8d 54 44 46 0d 05 |[Skip]":|. .TDF..|
|000008a0| b4 0a e7 20 57 25 20 8c | 0d 05 be 19 c8 95 20 28 |... W% .|...... (|
|000008b0| 52 25 3d 26 32 30 20 84 | 20 52 25 3d 26 33 41 29 |R%=&20 .| R%=&3A)|
|000008c0| 3a 0d 05 c8 0a 58 25 2b | 3d 31 3a 0d 05 d2 11 52 |:....X%+|=1:....R|
|000008d0| 25 3d 4a 25 3f 28 42 25 | 2b 58 25 29 0d 05 dc 05 |%=J%?(B%|+X%)....|
|000008e0| ce 0d 05 e6 09 57 25 3d | a3 3a 0d 05 f0 05 cd 0d |.....W%=|.:......|
|000008f0| 06 04 0e e7 20 52 25 3d | 26 35 42 20 8c 0d 06 0e |.... R%=|&5B ....|
|00000900| 2f e7 20 ac 28 43 25 29 | 20 80 20 a4 73 74 61 72 |/. .(C%)| . .star|
|00000910| 74 20 43 25 3d b9 3a f1 | 8a 35 30 2c 31 36 29 22 |t C%=.:.|.50,16)"|
|00000920| 5b 41 73 73 65 6d 62 6c | 65 72 5d 22 0d 06 18 06 |[Assembl|er]"....|
|00000930| cd 3a 0d 06 2c 0e e7 20 | 52 25 3d 26 35 44 20 8c |.:..,.. |R%=&5D .|
|00000940| 0d 06 36 22 e7 20 43 25 | 20 80 20 a4 65 6e 64 20 |..6". C%| . .end |
|00000950| 43 25 3d a3 3a f1 8a 35 | 30 2c 31 36 29 89 28 31 |C%=.:..5|0,16).(1|
|00000960| 32 29 0d 06 40 06 cd 3a | 0d 06 54 12 e7 20 ac 28 |2)..@..:|..T.. .(|
|00000970| 56 25 29 20 8c 20 8d 74 | 5a 46 0d 06 68 0a e7 20 |V%) . .t|ZF..h.. |
|00000980| 4b 25 20 8c 0d 06 72 1a | e7 20 52 25 3d 26 46 34 |K% ...r.|. R%=&F4|
|00000990| 20 52 25 3d 26 44 3a e5 | 20 8d 74 46 46 3a 0d 06 | R%=&D:.| .tFF:..|
|000009a0| 7c 23 e7 20 43 25 20 80 | 20 28 52 25 3d 26 33 42 ||#. C% .| (R%=&3B|
|000009b0| 20 84 20 52 25 3d 26 35 | 43 29 20 52 25 3d 26 44 | . R%=&5|C) R%=&D|
|000009c0| 3a 0d 06 86 06 cd 3a 0d | 06 9a 0d 44 25 3f 59 25 |:.....:.|...D%?Y%|
|000009d0| 3d 52 25 3a 0d 06 a4 0a | 59 25 2b 3d 31 3a 0d 06 |=R%:....|Y%+=1:..|
|000009e0| ae 0a 58 25 2b 3d 31 3a | 0d 06 b8 0c fd 20 52 25 |..X%+=1:|..... R%|
|000009f0| 3d 26 44 3a 0d 06 c2 0c | 44 25 3f 32 3d 59 25 3a |=&D:....|D%?2=Y%:|
|00000a00| 0d 06 d6 14 e7 20 ac 28 | 4d 25 20 80 20 59 25 3d |..... .(|M% . Y%=|
|00000a10| 34 29 20 8c 0d 06 e0 10 | e3 20 53 25 3d 30 20 b8 |4) .....|. S%=0 .|
|00000a20| 20 59 25 3a 0d 06 ea 15 | 4a 25 3f 28 51 25 2b 53 | Y%:....|J%?(Q%+S|
|00000a30| 25 29 3d 44 25 3f 53 25 | 3a 0d 06 f4 06 ed 3a 0d |%)=D%?S%|:.....:.|
|00000a40| 06 fe 0b 51 25 2b 3d 59 | 25 3a 0d 07 08 05 cd 0d |...Q%+=Y|%:......|
|00000a50| 07 12 0b 42 25 2b 3d 55 | 25 3a 0d 07 26 06 ce 3a |...B%+=U|%:..&..:|
|00000a60| 0d 07 3a 10 4a 25 3f 28 | 51 25 29 3d 26 46 46 3a |..:.J%?(|Q%)=&FF:|
|00000a70| 0d 07 62 2d ef 31 39 2c | 31 2c 36 7c 3a f1 8a 33 |..b-.19,|1,6|:..3|
|00000a80| 2c 31 36 29 89 28 37 35 | 29 8a 33 2c 31 36 29 22 |,16).(75|).3,16)"|
|00000a90| 52 45 4d 4f 56 45 44 3a | 20 20 22 3b 3a 0d 07 6c |REMOVED:|  ";:..l|
|00000aa0| 1b e7 20 4e 25 20 f1 22 | 4e 6f 74 68 69 6e 67 2e |.. N% ."|Nothing.|
|00000ab0| 22 3a e5 20 8d 74 68 47 | 0d 07 76 17 e7 20 4b 25 |":. .thG|..v.. K%|
|00000ac0| 20 f1 22 20 52 65 6d 61 | 72 6b 73 2e 20 22 3b 0d | ." Rema|rks. ";.|
|00000ad0| 07 80 26 e7 20 4c 25 20 | f1 22 4c 65 61 64 69 6e |..&. L% |."Leadin|
|00000ae0| 67 20 73 70 61 63 65 73 | 20 26 20 63 6f 6c 6f 6e |g spaces| & colon|
|00000af0| 73 2e 20 22 3b 0d 07 8a | 19 e7 20 4d 25 20 f1 22 |s. ";...|.. M% ."|
|00000b00| 45 6d 70 74 79 20 6c 69 | 6e 65 73 2e 22 3b 0d 07 |Empty li|nes.";..|
|00000b10| 94 1e 66 61 63 74 6f 72 | 3d 94 28 31 30 30 2a 28 |..factor|=.(100*(|
|00000b20| 47 25 2d 51 25 2b 31 29 | 2f 47 25 29 0d 07 9e 1b |G%-Q%+1)|/G%)....|
|00000b30| e7 20 47 25 3e 28 51 25 | 2b 31 29 20 5a 25 3d b9 |. G%>(Q%|+1) Z%=.|
|00000b40| 20 8b 20 5a 25 3d a3 0d | 07 a8 37 f1 8a 33 2c 31 | . Z%=..|..7..3,1|
|00000b50| 38 29 22 49 6e 70 75 74 | 20 66 69 6c 65 2c 20 22 |8)"Input| file, "|
|00000b60| 6f 6c 64 66 69 6c 65 24 | 22 2c 20 77 61 73 20 22 |oldfile$|", was "|
|00000b70| c3 28 47 25 29 22 20 62 | 79 74 65 73 2e 22 0d 07 |.(G%)" b|ytes."..|
|00000b80| b2 0c f1 8a 33 2c 32 30 | 29 3b 0d 07 bc 46 e7 20 |....3,20|);...F. |
|00000b90| 4e 25 20 f1 22 4f 75 74 | 70 75 74 20 6e 6f 74 20 |N% ."Out|put not |
|00000ba0| 73 61 76 65 64 3b 20 22 | 3b 3a e5 20 8d 54 42 48 |saved; "|;:. .TBH|
|00000bb0| 20 8b 20 f1 22 4f 75 74 | 70 75 74 20 66 69 6c 65 | . ."Out|put file|
|00000bc0| 2c 20 22 6e 65 77 66 69 | 6c 65 24 22 2c 20 22 3b |, "newfi|le$", ";|
|00000bd0| 0d 07 c6 3e e7 20 5a 25 | 20 f1 22 68 61 73 20 62 |...>. Z%| ."has b|
|00000be0| 65 65 6e 20 72 65 64 75 | 63 65 64 20 74 6f 20 22 |een redu|ced to "|
|00000bf0| 3b 20 8b 20 f1 22 68 61 | 73 20 62 65 65 6e 20 69 |; . ."ha|s been i|
|00000c00| 6e 63 72 65 61 73 65 64 | 20 74 6f 20 22 3b 0d 07 |ncreased| to ";..|
|00000c10| d0 15 f1 c3 28 51 25 2b | 31 29 22 20 62 79 74 65 |....(Q%+|1)" byte|
|00000c20| 73 2e 22 0d 07 da 10 40 | 25 3d 26 30 31 30 32 30 |s."....@|%=&01020|
|00000c30| 31 30 41 0d 07 e4 17 f1 | 8a 33 2c 32 33 29 22 54 |10A.....|.3,23)"T|
|00000c40| 68 69 73 20 69 73 20 61 | 22 3b 0d 07 ee 30 e7 20 |his is a|";...0. |
|00000c50| 5a 25 20 f1 22 20 72 65 | 64 75 63 74 69 6f 6e 20 |Z% ." re|duction |
|00000c60| 6f 66 20 22 3b 20 8b 20 | f1 22 6e 20 69 6e 63 72 |of "; . |."n incr|
|00000c70| 65 61 73 65 20 6f 66 20 | 22 3b 0d 07 f8 14 f1 c3 |ease of |";......|
|00000c80| 28 66 61 63 74 6f 72 29 | 22 25 3b 20 22 3b 0d 08 |(factor)|"%; ";..|
|00000c90| 02 36 f1 22 70 72 6f 63 | 65 73 73 69 6e 67 20 74 |.6."proc|essing t|
|00000ca0| 6f 6f 6b 20 61 62 6f 75 | 74 20 22 c3 28 28 91 20 |ook abou|t ".((. |
|00000cb0| 81 20 31 30 29 2f 31 30 | 29 22 20 73 65 63 6f 6e |. 10)/10|)" secon|
|00000cc0| 64 73 2e 22 0d 08 0c 0f | e7 20 4e 25 20 8c 20 8d |ds."....|. N% . .|
|00000cd0| 44 5c 48 0d 08 34 2f c8 | 99 20 22 4f 53 5f 46 69 |D\H..4/.|. "OS_Fi|
|00000ce0| 6c 65 22 2c 31 30 2c 6e | 65 77 66 69 6c 65 24 2c |le",10,n|ewfile$,|
|00000cf0| 26 46 46 42 2c 2c 4a 25 | 2c 28 4a 25 2b 51 25 2b |&FFB,,J%|,(J%+Q%+|
|00000d00| 31 29 0d 08 5c 1d f1 8a | 33 2c 32 37 29 22 46 69 |1)..\...|3,27)"Fi|
|00000d10| 6e 69 73 68 65 64 2e 22 | 3a e5 20 8d 44 70 48 0d |nished."|:. .DpH.|
|00000d20| 08 66 26 f1 8a 33 2c 32 | 37 29 3b 3a 40 25 3d 26 |.f&..3,2|7);:@%=&|
|00000d30| 39 30 36 3a ef 37 3a f6 | 3a f1 22 20 61 74 20 6c |906:.7:.|:." at l|
|00000d40| 69 6e 65 22 9e 0d 08 70 | 26 f1 3a 40 25 3d 26 39 |ine"...p|&.:@%=&9|
|00000d50| 30 41 3a ee 3a d9 23 30 | 3a ee 20 85 20 87 3a d8 |0A:.:.#0|:. . .:.|
|00000d60| 3a 2a 46 58 20 32 30 32 | 2c 33 32 0d 08 7a 05 e0 |:*FX 202|,32..z..|
|00000d70| 0d 08 a2 1a dd 20 a4 6e | 6f 3a ea 20 6b 65 79 25 |..... .n|o:. key%|
|00000d80| 3a ee 3a 2a 46 58 31 35 | 2c 31 0d 08 ac 15 f5 20 |:.:*FX15|,1..... |
|00000d90| 6b 65 79 25 3d 28 a5 20 | 80 20 26 44 46 29 3a 0d |key%=(. |. &DF):.|
|00000da0| 08 b6 18 fd 20 6b 65 79 | 25 3d 37 38 20 84 20 6b |.... key|%=78 . k|
|00000db0| 65 79 25 3d 38 39 3a 0d | 08 c0 22 e7 20 6b 65 79 |ey%=89:.|..". key|
|00000dc0| 25 3d 37 38 20 f1 22 4e | 6f 22 3a 3d b9 20 8b 20 |%=78 ."N|o":=. . |
|00000dd0| f1 22 59 65 73 22 3a 3d | a3 0d 08 e8 0c dd 20 a4 |."Yes":=|...... .|
|00000de0| 73 74 61 72 74 0d 08 f2 | 18 ea 20 6b 25 2c 6c 25 |start...|.. k%,l%|
|00000df0| 2c 6f 70 74 24 3a 6f 70 | 74 24 3d 22 22 0d 08 fc |,opt$:op|t$=""...|
|00000e00| 10 e3 20 6b 25 3d 31 20 | b8 20 32 30 3a 0d 09 06 |.. k%=1 |. 20:...|
|00000e10| 15 6c 25 3d 4a 25 3f 28 | 42 25 2b 58 25 2b 6b 25 |.l%=J%?(|B%+X%+k%|
|00000e20| 29 3a 0d 09 10 10 6f 70 | 74 24 2b 3d bd 28 6c 25 |):....op|t$+=.(l%|
|00000e30| 29 3a 0d 09 1a 06 ed 3a | 0d 09 24 12 3d a7 6f 70 |):.....:|..$.=.op|
|00000e40| 74 24 2c 22 4f 50 54 22 | 29 3a 0d 09 4c 0a dd 20 |t$,"OPT"|):..L.. |
|00000e50| a4 65 6e 64 0d 09 56 1d | ea 20 6b 25 2c 6c 25 2c |.end..V.|. k%,l%,|
|00000e60| 6f 70 74 24 3a 6b 25 3d | 30 3a 6f 70 74 24 3d 22 |opt$:k%=|0:opt$="|
|00000e70| 22 0d 09 60 06 f5 3a 0d | 09 6a 12 6c 25 3d 4a 25 |"..`..:.|.j.l%=J%|
|00000e80| 3f 28 42 25 2b 58 25 29 | 3a 0d 09 74 1e e7 20 6c |?(B%+X%)|:..t.. l|
|00000e90| 25 3c 3e 26 32 30 20 6f | 70 74 24 3d bd 28 6c 25 |%<>&20 o|pt$=.(l%|
|00000ea0| 29 2b 6f 70 74 24 3a 0d | 09 7e 10 58 25 2d 3d 31 |)+opt$:.|.~.X%-=1|
|00000eb0| 3a 6b 25 2d 3d 31 3a 0d | 09 88 14 fd 20 6c 25 3d |:k%-=1:.|.... l%=|
|00000ec0| 26 33 41 20 84 20 58 25 | 3d 32 3a 0d 09 92 0b 58 |&3A . X%|=2:....X|
|00000ed0| 25 2d 3d 6b 25 3a 0d 09 | 9c 1e e7 20 6f 70 74 24 |%-=k%:..|... opt$|
|00000ee0| 3d 22 3a 5d 22 20 84 20 | 6f 70 74 24 3d 22 5d 22 |=":]" . |opt$="]"|
|00000ef0| 20 3d b9 3a 0d 09 a6 07 | 3d a3 3a 0d ff          | =.:....|=.:..   |
+--------+-------------------------+-------------------------+--------+--------+